home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Languages / MPW Oberon 2.1168 / OInterfaces / ConnectionTools.mod < prev    next >
Encoding:
Text File  |  1995-08-07  |  3.0 KB  |  118 lines  |  [TEXT/MPS ]
  1. (*
  2.      File:        ConnectionTools.mod
  3.  
  4.      Contains:    Communications Toolbox Connection Tools Interfaces.
  5.  
  6.      Version:    Technology:    System 7.5
  7.                  Package:    Universal Interfaces 2.0 in “MPW Latest” on ETO #17
  8.  
  9.      Copyright:    © 1984-1995 by Apple Computer, Inc.
  10.                  All rights reserved.
  11.  
  12.      Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13.                  stack.  Include the file and version information (from above)
  14.                  in the problem description and send to:
  15.                      Internet:    apple.bugs.applelink.apple.com
  16.                      AppleLink:    APPLE.BUGS
  17.  
  18. *)
  19.  
  20. (*$TAGS-*)
  21. (*$CALLING PASCAL*)
  22. MODULE ConnectionTools;
  23.  
  24. IMPORT SYSTEM, Types, Dialogs, Connections;
  25.  
  26. (* $PUSH*)
  27. (* $ALIGN MAC68K*)
  28. (* $LibExport+*)
  29.  
  30. CONST
  31. (* messages for DefProc *)
  32.     cmInitMsg*                    = 0;
  33.     cmDisposeMsg*                = 1;
  34.     cmSuspendMsg*                = 2;
  35.     cmResumeMsg*                    = 3;
  36.     cmMenuMsg*                    = 4;
  37.     cmEventMsg*                    = 5;
  38.     cmActivateMsg*                = 6;
  39.     cmDeactivateMsg*                = 7;
  40.     cmIdleMsg*                    = 50;
  41.     cmResetMsg*                    = 51;
  42.     cmAbortMsg*                    = 52;
  43.     cmReadMsg*                    = 100;
  44.     cmWriteMsg*                    = 101;
  45.     cmStatusMsg*                    = 102;
  46.     cmListenMsg*                    = 103;
  47.     cmAcceptMsg*                    = 104;
  48.     cmCloseMsg*                    = 105;
  49.     cmOpenMsg*                    = 106;
  50.     cmBreakMsg*                    = 107;
  51.     cmIOKillMsg*                    = 108;
  52.     cmEnvironsMsg*                = 109;
  53. (* new connection tool messages for ctb 1.1 *)
  54.     cmNewIOPBMsg*                = 110;
  55.     cmDisposeIOPBMsg*            = 111;
  56.     cmGetErrorStringMsg*            = 112;
  57.     cmPBReadMsg*                    = 113;
  58.     cmPBWriteMsg*                = 114;
  59.     cmPBIOKillMsg*                = 115;
  60. (*    messages for validate DefProc    *)
  61.     cmValidateMsg*                = 0;
  62.     cmDefaultMsg*                = 1;
  63. (*    messages for Setup DefProc    *)
  64.     cmSpreflightMsg*                = 0;
  65.     cmSsetupMsg*                    = 1;
  66.     cmSitemMsg*                    = 2;
  67.     cmSfilterMsg*                = 3;
  68.     cmScleanupMsg*                = 4;
  69. (*    messages for scripting defProc    *)
  70.     cmMgetMsg*                    = 0;
  71.     cmMsetMsg*                    = 1;
  72. (*    messages for localization defProc    *)
  73.     cmL2English*                    = 0;
  74.     cmL2Intl*                    = 1;
  75.  
  76. (* private data constants *)
  77.     cdefType*                    = LONG("cdef");                        (* main connection definition procedure *)
  78.     cvalType*                    = LONG("cval");                        (* validation definition procedure *)
  79.     csetType*                    = LONG("cset");                        (* connection setup definition procedure *)
  80.     clocType*                    = LONG("cloc");                        (* connection configuration localization defProc *)
  81.     cscrType*                    = LONG("cscr");                        (* connection scripting defProc interfaces *)
  82.     cbndType*                    = LONG("cbnd");                        (* bundle type for connection *)
  83.     cverType*                    = LONG("vers");
  84.  
  85.  
  86. TYPE
  87.     CMDataBuffer* = RECORD
  88.         thePtr*:                    Types.Ptr;
  89.         count*:                    LONGINT;
  90.         channel*:                Connections.CMChannel;
  91.         flags*:                    Connections.CMFlags;
  92.     END;
  93.  
  94.     CMDataBufferPtr* = POINTER TO CMDataBuffer;
  95.  
  96.     CMCompletorRecord* = RECORD
  97.         async*:                    BOOLEAN;
  98.         completionRoutine*:        Connections.ConnectionCompletionUPP;
  99.     END;
  100.  
  101.     CMCompletorPtr* = POINTER TO CMCompletorRecord;
  102.  
  103. (*    Private Data Structure    *)
  104.     CMSetupStruct* = RECORD
  105.         theDialog*:                Dialogs.DialogPtr;
  106.         count*:                    INTEGER;
  107.         theConfig*:                Types.Ptr;
  108.         procID*:                    INTEGER;                                (* procID of the tool    *)
  109.     END;
  110.  
  111.     CMSetupPtr* = POINTER TO CMSetupStruct;
  112.  
  113.  
  114. (* $ALIGN RESET*)
  115. (* $POP*)
  116.  
  117.  END ConnectionTools.
  118.